INSTALL BAS
=========================
=      PrintExpress     =
=========================
= Installationsprogramm =
=========================
= 1989 programmiert von =
=   Andreas Stroiczek   =
=========================
"0123456789abcdef n&"
CurOf
Lengt
Gm240
Zvor1
Zvor1
Zvor2
Zvor2
Zvorx
Hardcopyroutine laden
"EXPRESS",
Balkenroutine
datsu
datsu
"DATA-Fehler in 220"
 DD,6E,00,DD,66,01,11,CC,07,0E,08,06,34,7E,EE,F0,77,23,10,F9,19,0D,20,F3,C9,&562
inver
Bildschirmaufbau
"PrintExpress"
"Installation"
,"      Grafikmodis"
,"     Zeilenvorschub"
,"Druckkopfnadeln verdreht"
," neue Version speichern"
,"    Programm beenden"
Hauptschleife
inver
inver
inver
Programm beenden
"Programm beenden (j/n)?"
neue Version speichern
"neue Version speichern (j/n)?"
)"Diskette einlegen...."
"....speichere 'EXPRESS'..."
"EXPRESS",
Grafikmodis anpassen
"Grafikmodus 120 Pixel pro Inch"
"(doppelte Dichte - 960 Punkte je Zeile)"
"Grafikmodus 240 Pixel pro Inch"
"(vierfache Dichte -1920 Punkte je Zeile)";
Gm240
Grafik-Steuercodes wegpoken
Zeilenvorschub einstellen
"Zeilenvorschub auf n/216 Inch"
"Momentan installierte Steuerzeichen:"
zvor1
)"n";
"####";
)"! Parameterbyte n nicht vorhanden !"
Zvor1
Druckkopfnadel verdreht
"Werden Ihre  Druckkopfnadeln  verkehrt-"
"herum angesteuert (das hoechstwertigste"
"Bit (MSB) unten statt oben) (j/n)?"
"Momentane Einstellung:  ";
"MSB ";
"oben"
"unten"
Hinterlegte Schrift
Rahmenroutine
Korrekt?
"####";
"Ist das korrekt (j/n)?"
Codes aus Tabelle
"Momentan installierte Steuerzeichen:"
)"n2";
)"n1";
"####";
"Wollen Sie diese Werte aendern (j/n)?"
neuen Code eingeben
"Neue Eingabe:"
  <SPACE>
  <DEL>
  <1234567890abcdefn&>
  <Return>
CurOf
Syntax-Check
Einsprung Syntax-Check
)"! Syntax-Fehler !"
n1/n2-Check
)"! n1 und/oder n2 nicht vorhanden !"
Ja/Nein-Abfrage